home *** CD-ROM | disk | FTP | other *** search
/ The Programmer Disk / The Programmer Disk (Microforum).iso / xpro / extra / pro14 / flowtest.txt < prev    next >
Text File  |  1993-07-02  |  18KB  |  226 lines

  1. OVERALL                       CAA-SECTION                    ENTRY
  2. OVERALL                       AA-GET-NAME                   YENTRY
  3. OVERALL                       AA-GET-NAME                   CGOTO      AA-GET-NAME
  4. OVERALL                       AA-GET-NAME                   UPERFORM   SET-TABLES
  5. OVERALL                       AA-GET-NAME                   UPERFORM   PROCESS-PROC
  6. OVERALL                       AA-GET-NAME                   USTOP      STOP RUN
  7. OVERALL                       CAA-END                        ENTRY
  8. GET-WORD                      GW-START                      YENTRY
  9. GET-WORD                      GW-START                      UPERFORM   GET-DATA
  10. GET-WORD                      GW-START                      CGOTO      GW-START
  11. GET-WORD                      GW-START                      CPERFORM   SEE-IF-LEVEL
  12. GET-WORD                      GW-START                      CPERFORM   SEE-IF-DATANAME
  13. GET-WORD                      GW-START                      UPERFORM   SCOT
  14. GET-WORD                      GW-END                        YENTRY
  15. SEE-IF-LEVEL                  SL-START                      YENTRY
  16. SEE-IF-LEVEL                  SL-START                      CGOTO      SL-EXIT
  17. SEE-IF-LEVEL                  SL-START                      CGOTO      SL-EXIT
  18. SEE-IF-LEVEL                  SL-START                      CGOTO      SL-EXIT
  19. SEE-IF-LEVEL                  SL-LOOP                       YENTRY
  20. SEE-IF-LEVEL                  SL-LOOP                       CGOTO      SL-FOUND
  21. SEE-IF-LEVEL                  SL-LOOP                       CGOTO      SL-LOOP
  22. SEE-IF-LEVEL                  SL-LOOP                       UGOTO      SL-EXIT
  23. SEE-IF-LEVEL                  SL-FOUND                       ENTRY
  24. SEE-IF-LEVEL                  SL-EXIT                       YENTRY
  25. SEE-IF-DATANAME               SD-START                      YENTRY
  26. SEE-IF-DATANAME               SD-EXIT                       YENTRY
  27. PROCESS-PROC                  KAA-START                     YENTRY
  28. PROCESS-PROC                  KAA-START                     UPERFORM   GET-WORD                      GET-WORD-EXIT
  29. PROCESS-PROC                  KAA-MAIN-LOOP                 YENTRY
  30. PROCESS-PROC                  KAA-MAIN-LOOP                 CGOTO      KAA-MAIN-END
  31. PROCESS-PROC                  KAA-POSIT                     YENTRY
  32. PROCESS-PROC                  KAA-UNTIL                     YENTRY
  33. PROCESS-PROC                  KAA-UNTIL                     CGOTO      KAA-ADMIT
  34. PROCESS-PROC                  KAA-UNTIL                     CGOTO      KAA-END-UNTIL
  35. PROCESS-PROC                  KAA-UNTIL                     UPERFORM   BUILD
  36. PROCESS-PROC                  KAA-UNTIL                     UPERFORM   GET-WORD
  37. PROCESS-PROC                  KAA-UNTIL                     UGOTO      KAA-UNTIL
  38. PROCESS-PROC                  KAA-END-UNTIL                  ENTRY
  39. PROCESS-PROC                  KAA-PROCESS-PROC               ENTRY
  40. PROCESS-PROC                  KBA-LOOP                       ENTRY
  41. PROCESS-PROC                  KBA-LOOP                      CGOTO      KAA-ADMIT
  42. PROCESS-PROC                  KBA-LOOP                      CGOTO      KBA-END
  43. PROCESS-PROC                  KBA-LOOP                      CPERFORM   PRINT-ERROR
  44. PROCESS-PROC                  KBA-LOOP                      CPERFORM   PUT-IGNORE                    PUT-IGNORE-EXIT
  45. PROCESS-PROC                  KBA-LOOP                      CPERFORM   BUILD
  46. PROCESS-PROC                  KBA-LOOP                      UPERFORM   GET-WORD
  47. PROCESS-PROC                  KBA-LOOP                      UGOTO      KBA-LOOP
  48. PROCESS-PROC                  KBA-END                        ENTRY
  49. PROCESS-PROC                  KBA-END                       CPERFORM   PRINT-ERROR
  50. PROCESS-PROC                  KBA-END                       CPERFORM   PRINT-ERROR
  51. PROCESS-PROC                  KBA-END                       UPERFORM   BUILD
  52. PROCESS-PROC                  KBA-END                       UPERFORM   GET-WORD
  53. PROCESS-PROC                  KBE-LOOP                      YENTRY
  54. PROCESS-PROC                  KBE-LOOP                      CPERFORM   PRINT-ERROR
  55. PROCESS-PROC                  KBE-LOOP                      CGOTO      KAA-ADMIT
  56. PROCESS-PROC                  KBE-LOOP                      CPERFORM   BUILD
  57. PROCESS-PROC                  KBE-LOOP                      CPERFORM   GET-WORD
  58. PROCESS-PROC                  KBE-LOOP                      CGOTO      KBE-LOOP
  59. PROCESS-PROC                  KBE-LOOP                      CPERFORM   BUILD
  60. PROCESS-PROC                  KBE-LOOP                      CPERFORM   GET-WORD
  61. PROCESS-PROC                  KBE-LOOP                      CGOTO      KBE-LOOP
  62. PROCESS-PROC                  KBE-LOOP                      CPERFORM   PUT-IGNORE
  63. PROCESS-PROC                  KBE-LOOP                      CPERFORM   PRINT-ERROR
  64. PROCESS-PROC                  KBE-LOOP                      CPERFORM   GET-WORD
  65. PROCESS-PROC                  KBE-LOOP                      CGOTO      KBE-LOOP
  66. PROCESS-PROC                  KBE-LOOP                      UPERFORM   BUILD
  67. PROCESS-PROC                  KBE-LOOP                      UPERFORM   GET-WORD
  68. PROCESS-PROC                  KBB-LOOP                      YENTRY
  69. PROCESS-PROC                  KBB-LOOP                      CPERFORM   PRINT-ERROR
  70. PROCESS-PROC                  KBB-LOOP                      CGOTO      KAA-ADMIT
  71. PROCESS-PROC                  KBB-LOOP                      CGOTO      KBB-NEXT
  72. PROCESS-PROC                  KBB-LOOP                      CGOTO      KBB-END
  73. PROCESS-PROC                  KBB-LOOP                      UPERFORM   BUILD
  74. PROCESS-PROC                  KBB-LOOP                      UPERFORM   GET-WORD
  75. PROCESS-PROC                  KBB-LOOP                      UGOTO      KBB-LOOP
  76. PROCESS-PROC                  KBB-END                        ENTRY
  77. PROCESS-PROC                  KBB-END                       UPERFORM   PUT-WORD
  78. PROCESS-PROC                  KBB-END                       UPERFORM   PUT-FULLSTOP
  79. PROCESS-PROC                  KBB-NEXT                      YENTRY
  80. PROCESS-PROC                  KBB-NEXT                      CPERFORM   PUT-FULLSTOP
  81. PROCESS-PROC                  KBB-NEXT                      CPERFORM   PUT-SPACE
  82. PROCESS-PROC                  KBB-NEXT                      CPERFORM   GET-WORD
  83. PROCESS-PROC                  KBB-NEXT                      UPERFORM   PUT-PARAGRAPH
  84. PROCESS-PROC                  KBB-NEXT                      CGOTO      KBB-EPROC-LOOP
  85. PROCESS-PROC                  KBG-LOOP                      YENTRY
  86. PROCESS-PROC                  KBG-LOOP                      CPERFORM   PRINT-ERROR
  87. PROCESS-PROC                  KBG-LOOP                      CGOTO      KAA-ADMIT
  88. PROCESS-PROC                  KBG-LOOP                      CPERFORM   PRINT-ERROR
  89. PROCESS-PROC                  KBG-LOOP                      CGOTO      KAA-PROCESS-EPROC
  90. PROCESS-PROC                  KBG-LOOP                      CPERFORM   GET-WORD
  91. PROCESS-PROC                  KBG-LOOP                      CGOTO      KBG-PSV
  92. PROCESS-PROC                  KBG-LOOP                      CPERFORM   GET-WORD
  93. PROCESS-PROC                  KBG-LOOP                      CGOTO      KBG-THREAD
  94. PROCESS-PROC                  KBG-LOOP                      CPERFORM   GET-WORD
  95. PROCESS-PROC                  KBG-LOOP                      CGOTO      KBG-END
  96. PROCESS-PROC                  KBG-LOOP                      CGOTO      KBG-END
  97. PROCESS-PROC                  KBG-LOOP                      UPERFORM   BUILD
  98. PROCESS-PROC                  KBG-LOOP                      UPERFORM   GET-WORD
  99. PROCESS-PROC                  KBG-LOOP                      UGOTO      KBG-LOOP
  100. PROCESS-PROC                  KBG-PSV                        ENTRY
  101. PROCESS-PROC                  KBG-PSV                       CPERFORM   PRINT-ERROR
  102. PROCESS-PROC                  KBG-PSV                       CPERFORM   PUT-ENDFILE
  103. PROCESS-PROC                  KBG-PSV                       CGOTO      KAA-ADMIT
  104. PROCESS-PROC                  KBG-PSV                       CPERFORM   BUILD
  105. PROCESS-PROC                  KBG-PSV                       CPERFORM   GET-WORD
  106. PROCESS-PROC                  KBG-PSV                       CGOTO      KBG-PSV
  107. PROCESS-PROC                  KBG-PSV                       CGOTO      KBG-LOOP
  108. PROCESS-PROC                  KBG-PSV                       UPERFORM   GET-WORD
  109. PROCESS-PROC                  KBG-PSV                       UGOTO      KBG-LOOP
  110. PROCESS-PROC                  KBG-THREAD                     ENTRY
  111. PROCESS-PROC                  KBG-THREAD                    CPERFORM   PRINT-ERROR
  112. PROCESS-PROC                  KBG-THREAD                    CPERFORM   PUT-ENDFILE
  113. PROCESS-PROC                  KBG-THREAD                    CGOTO      KAA-ADMIT
  114. PROCESS-PROC                  KBG-THREAD                    CPERFORM   BUILD
  115. PROCESS-PROC                  KBG-THREAD                    CPERFORM   GET-WORD
  116. PROCESS-PROC                  KBG-THREAD                    CGOTO      KBG-THREAD
  117. PROCESS-PROC                  KBG-THREAD                    CGOTO      KBG-LOOP
  118. PROCESS-PROC                  KBG-THREAD                    UPERFORM   GET-WORD
  119. PROCESS-PROC                  KBG-THREAD                    UGOTO      KBG-LOOP
  120. PROCESS-PROC                  KBG-END                        ENTRY
  121. PROCESS-PROC                  KBH-PROCTYPE                   ENTRY
  122. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  123. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  124. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  125. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WORD
  126. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-FULLSTOP
  127. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-SPACE
  128. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  129. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  130. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  131. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-PSVNAME
  132. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-FULLSTOP
  133. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-SPACE
  134. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-ENTRY
  135. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-GOTO
  136. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-WS
  137. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-FULLSTOP
  138. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-SPACE
  139. PROCESS-PROC                  KBH-PROCTYPE                  CPERFORM   PUT-ENTRY
  140. PROCESS-PROC                  KBB-EPROC-LOOP                YENTRY
  141. PROCESS-PROC                  KBC-LOOP                      YENTRY
  142. PROCESS-PROC                  KBC-LOOP                      CPERFORM   PRINT-ERROR
  143. PROCESS-PROC                  KBC-LOOP                      CGOTO      KAA-PROCESS-EPROC
  144. PROCESS-PROC                  KBC-LOOP                      CGOTO      KAA-PROCESS-EPROC
  145. PROCESS-PROC                  KBC-LOOP                      CPERFORM   BUILD
  146. PROCESS-PROC                  KBC-LOOP                      CPERFORM   GET-WORD
  147. PROCESS-PROC                  KBC-LOOP                      CGOTO      KBC-LOOP
  148. PROCESS-PROC                  KBD-SELECT                    YENTRY
  149. PROCESS-PROC                  KBD-SELECT                    CPERFORM   PROCESS-STRUCTURE
  150. PROCESS-PROC                  KBD-SELECT                    CGOTO      KBD-END
  151. PROCESS-PROC                  KBD-SELECT                    CPERFORM   PROCESS-SREAD
  152. PROCESS-PROC                  KBD-SELECT                    CGOTO      KBD-END
  153. PROCESS-PROC                  KBD-SELECT                    CPERFORM   GET-WORD
  154. PROCESS-PROC                  KBD-SELECT                    CGOTO      KBD-END
  155. PROCESS-PROC                  KBD-SELECT                    UPERFORM   PRINT-ERROR
  156. PROCESS-PROC                  KBD-SELECT                    UPERFORM   GET-WORD
  157. PROCESS-PROC                  KBD-END                       YENTRY
  158. PROCESS-PROC                  KBD-END                       UGOTO      KBB-EPROC-LOOP
  159. PROCESS-PROC                  KAA-PROCESS-EPROC              ENTRY
  160. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  161. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  162. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  163. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-PSVNAME
  164. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-FULLSTOP
  165. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-SPACE
  166. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-UPDATEPSV
  167. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-FULLSTOP
  168. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-SPACE
  169. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-GOTO
  170. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WORD
  171. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-PARAGRAPH
  172. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-SPACE
  173. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  174. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  175. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  176. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WORD
  177. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-FULLSTOP
  178. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-SPACE
  179. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  180. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  181. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  182. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WS
  183. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-GOTO
  184. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-WORD
  185. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-FULLSTOP
  186. PROCESS-PROC                  KAA-PROCESS-EPROC             CPERFORM   PUT-SPACE
  187. PROCESS-PROC                  KAA-PROCESS-EPROC             CGOTO      KAA-WRITE-EPROC
  188. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  189. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-PSVNAME
  190. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  191. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  192. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  193. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  194. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  195. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-THEN
  196. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  197. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  198. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-WS
  199. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-PSVNAME
  200. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-FULLSTOP
  201. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-SPACE
  202. PROCESS-PROC                  KAA-PROCESS-EPROC             UPERFORM   PUT-GOTO
  203. PROCESS-PROC                  KAD-LOOP                      YENTRY
  204. PROCESS-PROC                  KAD-LOOP                      CGOTO      KAD-END
  205. PROCESS-PROC                  KAD-LOOP                      UPERFORM   PUT-WORD
  206. PROCESS-PROC                  KAD-LOOP                      UPERFORM   PUT-COMMA
  207. PROCESS-PROC                  KAD-LOOP                      UPERFORM   PUT-SPACE
  208. PROCESS-PROC                  KAD-LOOP                      UGOTO      KAD-LOOP
  209. PROCESS-PROC                  KAD-END                        ENTRY
  210. PROCESS-PROC                  KAD-END                       UPERFORM   PUT-WS
  211. PROCESS-PROC                  KAD-END                       UPERFORM   PUT-WS
  212. PROCESS-PROC                  KAD-END                       UPERFORM   PUT-PSVNAME
  213. PROCESS-PROC                  KAD-END                       UPERFORM   PUT-FULLSTOP
  214. PROCESS-PROC                  KAD-END                       UPERFORM   PUT-SPACE
  215. PROCESS-PROC                  KAD-END                       UPERFORM   PUT-ENTRY
  216. PROCESS-PROC                  KAA-WRITE-EPROC               YENTRY
  217. PROCESS-PROC                  KAA-WRITE-EPROC               UPERFORM   PUT-PARAGRAPH
  218. PROCESS-PROC                  KAA-WRITE-EPROC               UPERFORM   PUT-EXIT
  219. PROCESS-PROC                  KAA-WRITE-EPROC               UPERFORM   PUT-COMMENT
  220. PROCESS-PROC                  KAA-WRITE-EPROC               CPERFORM   PUT-COMMENT
  221. PROCESS-PROC                  KAA-WRITE-EPROC               UGOTO      KAA-MAIN-LOOP
  222. PROCESS-PROC                  KAA-ADMIT                      ENTRY
  223. PROCESS-PROC                  KAA-ADMIT-END                 YENTRY
  224. PROCESS-PROC                  KAA-MAIN-END                  YENTRY
  225. PROCESS-PROC                  KAA-END                       YENTRY
  226.